home *** CD-ROM | disk | FTP | other *** search
/ BCI NET 2 / BCI NET 2.iso / archives / programming / libraries / rtlibrary.lha / rtlibrary / src / rt / rt_remsome.c < prev    next >
Encoding:
C/C++ Source or Header  |  1995-01-31  |  707 b   |  37 lines
  1. /*
  2.  * $Id: rt_remsome.c $
  3.  *
  4.  * Author: Tomi Ollila <Tomi.Ollila@hut.fi>
  5.  *
  6.  *     Copyright (c) 1994 Tomi Ollila
  7.  *         All rights reserved
  8.  *
  9.  * Created: Sun Dec 25 01:01:58 1994 too
  10.  * Last modified: Wed Feb  1 01:40:16 1995 too
  11.  *
  12.  * HISTORY 
  13.  * $Log: $
  14.  */
  15.  
  16. #include "rt_priv.h"
  17.  
  18. void rt_RemSome(struct RT * rt, void * ptr, ULONG flags)
  19. {
  20.   struct RTNode * node = rt->node;
  21.   int dataflag = flags & RTRF_DATA;
  22.  
  23.   while (node->func) {
  24.     if (ptr == ((dataflag)? node->data: node)) {
  25.       if (flags & RTRF_REMTO) {
  26.     ((f_void)node->func)(node->data);
  27.     node--;
  28.       }
  29.       rt->node = node; /* - 1 */;
  30.       return;
  31.     }
  32.     ((f_void)node->func)(node->data);
  33.     node--;
  34.   }
  35.   rt->node = &rt->endnode;
  36. }
  37.